package Dumps;

use strict;
use Data::Dumper;

sub var_dump {
	print "<pre>";
	my $link = shift;
	print Dumper %$link;
	print "</pre>";
}


1;